(100分)(JAVA|VB)SCRIPT:如何把页内图片用FSO或ADO保存起来？

如题，某网页只有一张图片，如何不使用XMLHTTP把这张图片保存到指定的地址(因为指定图片存在来源验证，无法在本地使用XMLHTTP获得！)，权限不是问题，用HTA格式应该不存在这个问题！

代码用JAVASCRIPT或者VBSCRIPT都可以！

补充：
我现在只想到利用IE的缓存穷搜索办法来获得这张图片，但是一些ASP载入的图片却是出现文件名重名现象，如：sendjpg.asp?id=1 和 sendjpg.asp?id=2 这两张不同图片却在IE缓存里使用同一文件名，无法辩别！

谁能帮我想个办法，解决掉IE缓存的问题或者另用新方法都可以！解决了补送100分！
^_^

谢谢回答！你的代码是对服务端的文件用流方式输出到客户端让其弹出下载窗口！

但这不是我的要求，我要下载的图片是从别的网站自动下载到指定本地目录里(而下面的代码是从本机服务器下载)，并不需要弹出下载窗口！就像流水线一样！而且我的是本地执行，而下面的代码是网络执行！

说说我的目的吧：我是想要做一个小说下载工具，通过网站的小说地址，把各个文章包括里面的图片一起下载到本地目录，但是对方网站的图片被加了来源验证，无法直接用XMLHTTP获取，所以得另想办法！

不过还是谢谢你的回答，我连发了三次都没人理采！可怜啊~~~

不知道这样的文章对你有没有帮助

////////////////////////////

利用stream直接下载文件

来源：csdn

在浏览器的地址栏里直接输入一个doc或xls或jpg的文件的url路径，那么该文件会直接显示在浏览器里。而在很多时候我们希望能直接弹出下载提示框让用户下载，我们该怎么办呢？这里有两种方法：
1、设置你的服务器的iis，给doc等后缀名做映射
2、在向客户端发送时设置其contenttype

下面详细说明方法2

<%
Response.Buffer = true
Response.Clear

dim url
Dim fso,fl,flsize
dim Dname
Dim objStream,ContentType,flName,isre,url1
'*********************************************调用时传入的下载文件名
Dname=trim(request("n"))
'******************************************************************
If Dname<>"" Then
'******************************下载文件存放的服务端目录
url=server.MapPath("/")&""&Dname
'***************************************************
End If

Set fso=Server.CreateObject("Scripting.FileSystemObject")
Set fl=fso.getfile(url)